object FTrocaEmpresaTitulo: TFTrocaEmpresaTitulo
  Left = 376
  Top = 246
  Width = 263
  Height = 115
  BorderIcons = [biSystemMenu]
  Caption = 'Troca Empresa T'#237'tulo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 2
    Top = 5
    Width = 41
    Height = 13
    Caption = 'Empresa'
  end
  object DBLEmpresa: TDBLookupComboBox
    Left = 2
    Top = 22
    Width = 250
    Height = 21
    KeyField = 'EMP_CODIGO'
    ListField = 'EMP_RAZAO'
    ListSource = DsEmpresa
    TabOrder = 0
  end
  object BitTrocar: TBitBtn
    Left = 2
    Top = 55
    Width = 120
    Height = 25
    Caption = '&Trocar'
    TabOrder = 1
    OnClick = BitTrocarClick
    Kind = bkRetry
  end
  object BitFechar: TBitBtn
    Left = 130
    Top = 55
    Width = 120
    Height = 25
    Caption = '&Fechar'
    TabOrder = 2
    OnClick = BitFecharClick
    Kind = bkClose
  end
  object DsEmpresa: TDataSource
    DataSet = DMGestao.QEmpresa
    Left = 104
    Top = 8
  end
  object QExec: TQuery
    DatabaseName = 'base'
    Left = 192
    Top = 16
  end
end
